home *** CD-ROM | disk | FTP | other *** search
- object FormPrint: TFormPrint
- Left = 169
- Top = 169
- BorderIcons = []
- BorderStyle = bsDialog
- Caption = 'Select Print Options'
- ClientHeight = 176
- ClientWidth = 261
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- OnHide = FormHide
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object ButtonPrint: TButton
- Left = 8
- Top = 144
- Width = 77
- Height = 25
- Hint = 'Send to printer, using the currently selected print options'
- Caption = '&Print'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- OnClick = ButtonPrintClick
- end
- object ButtonCancel: TButton
- Left = 92
- Top = 144
- Width = 77
- Height = 25
- Cancel = True
- Caption = '&Cancel'
- ParentShowHint = False
- ShowHint = False
- TabOrder = 1
- OnClick = ButtonCancelClick
- end
- object ButtonHelp: TButton
- Left = 176
- Top = 144
- Width = 77
- Height = 25
- Caption = '&Help'
- ParentShowHint = False
- ShowHint = False
- TabOrder = 2
- OnClick = ButtonHelpClick
- end
- object GroupBoxPrint: TGroupBox
- Left = 8
- Top = 8
- Width = 245
- Height = 129
- Hint = 'Print options'
- Caption = 'Print'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- object RadioGroupPages: TRadioGroup
- Left = 12
- Top = 16
- Width = 221
- Height = 101
- Hint = 'Which pages to print'
- Caption = 'Pages'
- ItemIndex = 0
- Items.Strings = (
- 'All'
- 'Current page only'
- 'From')
- TabOrder = 0
- TabStop = True
- OnClick = RadioGroupPagesClick
- end
- object PanelTo: TPanel
- Left = 68
- Top = 84
- Width = 161
- Height = 29
- BevelOuter = bvNone
- Caption = 'to'
- TabOrder = 1
- object SpinEditPrintPagesFrom: TSpinEdit
- Left = 4
- Top = 3
- Width = 65
- Height = 22
- Hint = 'Print from page'
- AutoSelect = False
- MaxValue = 1
- MinValue = 1
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- Value = 0
- OnChange = SpinEditPrintPagesFromChange
- OnExit = SpinEditPrintPagesFromExit
- end
- object SpinEditPrintPagesTo: TSpinEdit
- Left = 92
- Top = 3
- Width = 65
- Height = 22
- Hint = 'Print to page'
- AutoSelect = False
- MaxValue = 1
- MinValue = 1
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- Value = 0
- OnChange = SpinEditPrintPagesToChange
- OnExit = SpinEditPrintPagesToExit
- end
- end
- end
- end
-